home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libcalls / bullet.inc < prev    next >
Text File  |  1998-06-24  |  861b  |  41 lines
  1. pattern OpenEngine is
  2.     push a6;
  3.     a6:=BulletBase; jsr [a6-30];
  4.     pop a6;
  5. endp;                                                            # OPENENGINE
  6.  
  7. pattern CloseEngine(_glyphEngine) is
  8.     push a6;
  9.     a0:=_glyphEngine;
  10.     a6:=BulletBase; jsr [a6-36];
  11.     pop a6;
  12. endp;                                                            # CLOSEENGINE
  13.  
  14. pattern SetInfoA(_glyphEngine,_tagList) is
  15.     push a6;
  16.     safe a0:=_glyphEngine; a1:=_tagList;;
  17.     a6:=BulletBase; jsr [a6-42];
  18.     pop a6;
  19. endp;                                                            # SETINFOA
  20.  
  21. pattern ObtainInfoA(_glyphEngine,_tagList) is
  22.     push a6;
  23.     safe a0:=_glyphEngine; a1:=_tagList;;
  24.     a6:=BulletBase; jsr [a6-48];
  25.     pop a6;
  26. endp;                                                            # OBTAININFOA
  27.  
  28. pattern ReleaseInfoA(_glyphEngine,_tagList) is
  29.     push a6;
  30.     safe a0:=_glyphEngine; a1:=_tagList;;
  31.     a6:=BulletBase; jsr [a6-54];
  32.     pop a6;
  33. endp;                                                            # RELEASEINFOA
  34.  
  35. pattern bulletPrivate1 is
  36.     push a6;
  37.     a6:=BulletBase; jsr [a6-60];
  38.     pop a6;
  39. endp;                                                            # BULLETPRIVATE1
  40.  
  41.